在vb中Open "D:\ziku\h16" For Binary As #1无论位置或文件名是否正确都现在文件

来源：百度知道 编辑：UC知道 时间：2024/06/08 06:28:38
运行时显示实时错误55，文件已打开
点击帮助时说MSDN集合不存在请重新安装MSDN
无论位置或文件名是否正确运行时都显示文件已打开

有两种可能
一种是"D:\ziku\h16"已经被其他程序或自己的程序用binary方式打开，这种方式是独占的，在前一个程序关闭文件之前，其他程序无法以binary方式访问。

另一种可能是前面可能使用了类似Open "D:\ziku\h15" For Binary As #1的语句，使用#1打开了另一个文件，在#1关闭之前，是不可以再使用as #1的，

正确的写法应该是使用FreeFile函数获取下一个可供Open的文件号：
Dim iFreefile As Integer
iFreefile = FreeFile
Open "D:\ziku\h16" For Binary As #FreeFile
...
Close FreeFile